home *** CD-ROM | disk | FTP | other *** search
/ Programmer Plus 2007 / Programmer-Plus-2007.iso / Programming / XML Utilities / Professional Programmer XSL IDE / Xselerator25.msi / Data.Cab / F29990_reverse.xsl < prev    next >
Encoding:
Extensible Markup Language  |  2001-11-17  |  959 b   |  33 lines
  1. <xsl:stylesheet version="1.0"
  2. xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
  3. xmlns:str-reverse-func="f:str-reverse-func"
  4. exclude-result-prefixes="xsl str-reverse-func"
  5. >
  6.  
  7.    <xsl:import href="str-foldl.xsl"/>
  8.  
  9.    <str-reverse-func:str-reverse-func/>
  10.  
  11.     <xsl:template name="strReverse">
  12.       <xsl:param name="pStr"/>
  13.  
  14.       <xsl:variable name="vReverseFoldlFun" 
  15.                     select="document('')/*/str-reverse-func:*[1]"/>
  16.  
  17.       <xsl:call-template name="str-foldl">
  18.         <xsl:with-param name="pFunc" select="$vReverseFoldlFun"/>
  19.         <xsl:with-param name="pStr" select="$pStr"/>
  20.         <xsl:with-param name="pA0" select="/.."/>
  21.       </xsl:call-template>
  22.     </xsl:template>
  23.  
  24.     <xsl:template match="str-reverse-func:*">
  25.          <xsl:param name="arg1" select="0"/>
  26.          <xsl:param name="arg2" select="0"/>
  27.  
  28.          <xsl:value-of select="concat($arg2,$arg1)"/>
  29.     </xsl:template>
  30.  
  31. </xsl:stylesheet>
  32.  
  33.